1 F$=CHR$(34):U$="EWLBL":Z$=F$+U$+F$:POKE53280,2:POKE53281,14:PRINT"[147][142]IGITT,HIERISTDASSCHPIEHL:":PRINT"uiuiucci[178]ccci[178]cccck":PRINT"ukjckjibuibbbb":PRINT"bbbjkbbb[171]cc[179]":PRINT"bbbuibbbb":PRINT"bbbbbbbbb"
2 PRINT"[177][177]jkjk[177]ccck[177]ccccccccck":PRINT"ui*********++":PRINT"jk***++":PRINT"ui*****++":PRINT"bb*******++"
3 PRINT"bbM*********++":PRINT"jk*****++":PRINT"**********++":PRINT"**++":PRINT"[158]UNTERTITEL:**#++":PRINT"[158]ccccccccccccc"
4 PRINT"[144]AUG[156]EUM[158]A[129]U[149]G[150]E!!!":PRINT"UNTNUHNPFIEHLSCHPAHZ!!!":GOSUB53:POKE53280,12:POKE53281,13:PRINT"[147][129] VORGESCHICHTE":PRINT" [163][163][163][163][163][163][163][163][163][163][163][163][163]":PRINT" DU BIST EIN KLEINES TEUFELCHEN UND":PRINT" WURDEST VON DEN ERZDAEMONEN BEAUF-"
5 PRINT" TRAGT, DEN HIMMEL AUFZUSUCHEN UND EN-":PRINT" GEL ABZUSCHLACHTEN, UM AUS DEREN FLUE-":PRINT" GEL ANTICHRISTEN-KREUZE ZU STRICKEN.":PRINT" UND SCHON HAST DU SO EIN TEIL VOR DEI-":PRINT" NER NASE. DU WIRST":PRINT" (1) DEM ENGEL EINEN BLASEN,"
6 PRINT" (2) IHN TOTAL VOLLQUATSCHEN ODER":PRINT" (3) IHN ALLE MACHEN UND ANFANGEN ZU":PRINT"     HAEKELN."
7 GOSUB53:IFA$="1"THEN11
8 IFA$="2"THEN12
9 IFA$="3"THEN14
10 GOTO7
11 PRINT" RINN, RINN, IMMER INS KINN! UND PLOETZ-";:PRINT" LICH PLATZT DIR DEIN KINN! UND WEIL ICH";:PRINT" EIN PROGRAMMIERERSCHWEIN BIN, TUST DU":PRINT" JETZT NICHT GEWINN' !!! GAME TOT!":GOSUB53:GOTO32
12 PRINT"[147] HEY, DU QUATSCHT DEN ENGEL VOLL, WEIL":PRINT" ER DICH SCHON DIE GANZE ZEIT ANFLIRTETE";:PRINT" WAEHREND DEINER ARBEIT IM GOETHEINSTI-":PRINT" TUT. DER ENGEL IST ZWAR EIN KLEINER UND";:PRINT" TIERISCH HUEBSCHER, ABER SOETWAS GE-"
13 PRINT" HOERT SICH NICHT, WENN MAN VERGEBEN":PRINT" IST. SCHADE!!! DIE TOLLSTEN MAEDCHEN":PRINT" WUERDE MAN KRIEGEN, WENN MAN VERGEBEN":PRINT" IST. NOTGEILE SAU. ZUR STRAFE VERLIERST";:PRINT" DU!!!":GOSUB53:GOTO32
14 PRINT" SO HAEKELST DU EIN SCHOENES FLEISCHMU-":PRINT" STER AUS GEDAERMEN UND NERVENSTRAENGEN.";:PRINT" DAS SIEHT TOLL AUS UND BEAMT DICH IN":PRINT" DEN NAECHSTEN ABSCHNITT!!":GOSUB53:PRINT"[147]":POKE53280,0:POKE53281,0:PRINT"[206]UN HAST [196]U ALSO EIN SCHOENES SELBSTGE-"
15 PRINT"STRICKTES [193]NTICHRISTEN-[203]REUZ VORZUWEI-":PRINT"SEN. [213]ND NUN?":PRINT"(1) [206]ACH WEITEREN [197]NGELN [193]USSCHAU HAL-":PRINT"    TEN,":PRINT"(2) DEM [207]BERTEUFEL [194]ERICHT ERSTATTEN,":PRINT"(3) ODER [193]POKALYPSE EINLEITEN?"
16 GOSUB53:IFA$="1"THEN20
17 IFA$="2"THEN21
18 IFA$="3"THEN22
19 GOTO16
20 PRINT"[196]AS IST ES, WAS ICH HOEREN WOLLTE. [213]ND":PRINT"SCHON WIRST [196]U IN EINEN WEITEREN [193]B-":PRINT"SCHNITT DIESES [211]PIELS GEBEAMT!":GOSUB53:GOTO23
21 PRINT"[196]ER HEIZT [196]IR SCHOEN EIN, NACHDEM [196]U LE-";:PRINT"DIGLICH EINEN [197]NGEL ABGEMURKST HAST. [218]UR";:PRINT"[211]TRAFE MUSST [196]U NOCH EINMAL VON VORN AN-";:PRINT"FANGEN!":GOSUB53:GOTO32
22 PRINT"[211]O ETWAS DARF EIN KLEINES [212]EUFELCHEN":PRINT"NOCH GAR NICHT. [215]EIL [196]U NICHT SEHR FUEG-";:PRINT"SAM BIST, BEGINNT FUER [196]ICH DER GANZE":PRINT"[211]PASS VON [206]EUEM...":GOSUB53:GOTO32
23 PRINT"[147]":POKE53281,12:POKE53280,4:PRINT"[142] WAS WILLST DU VERFICKTES BLOEDES":PRINT" ARSCHLOCH MACHEN?":PRINT" (1) DAS SPIEL BEENDEN.":PRINT" (2) WIE MAIK GERADE EINE RAUCHEN.":PRINT" (3) DICH MIT ALLEN ENGELN VERSOEHNEN."
24 GOSUB53:IFA$="1"THEN28
25 IFA$="2"THEN30
26 IFA$="3"THEN31
27 GOTO24
28 PRINT" AHA, DU HAST WOHL KEINEN BOCK MEHR? NA":PRINT" GUT, DANN VERPISS DICH DOCH! ABER VOR-":PRINT" HER MACHST DU ERSTMAL BEKANNTSCHAFT":PRINT" MIT DEM "Z$"-GENERATOR, UM DIESES":PRINT" BESCHISSENE SPIEL ZU LOESEN. VORHER"
29 PRINT" LASSE ICH DICH HIER NICHT WEG!":GOSUB53:GOTO39
30 PRINT" OB KLEINE TEUFELCHEN NIE AN LUNGEN-":PRINT" KREBS ERKRANKEN? FEHLDENKEN!":GOSUB53:GOTO32
31 PRINT" HAST DU SCHON MAL UEBERLEGT, SELBER 'N":PRINT" ENGEL ZU WERDEN, DU SCHEINHEILIGE":PRINT" FICKFRESSE, DU? VERLOREN!":GOSUB53:GOTO32
32 POKE53280,4:POKE53281,15:PRINT"[147][142][153]      [160]         [160]      ":PRINT"      [160]   [160]   ":PRINT"      [160]     [160]   ":PRINT"      [160]   [160]  ":PRINT"                  "
33 PRINT"                                      ":PRINT"  WIE SEHR DU DICH AUCH ANGESTRENGT   ":PRINT"   HABEN MAGST... HIER FINDET DEIN    ":PRINT"      ARMSELIGES LEBEN EIN ENDE       ":PRINT"                                      "
34 PRINT"[158]                                      ":PRINT" WENN DU NOCH EINMAL VON VORN BEGIN-  ":PRINT"   NEN MOECHTEST, DANN DRUECKE EIN    ":PRINT" >>N<< FUER "F$"NEUANFANG"F$"; WENN NICHT,  ":PRINT"          >>E<< FUER "F$"ENDE"F$"           "
35 PRINT"                                      ":PRINT"                                      ":PRINT" MADE IN SUFF 8 IST EIN B-SOFT-SPIEL, ":PRINT"   GESCHRIEBEN VON BREIT NIGHT 1999   ":PRINT"                                      "
36 GOSUB53:IFA$="N"THENRUN
37 IFA$="E"THENPOKE53281,6:GOTO46
38 GOTO36
39 PRINT"[147]":POKE53280,6:POKE53281,6:DIMA$(4):P=1762:GOSUB50:PRINT"GEBE EIN WORT DEINER WAHL EIN (BITTE NUR":PRINT"FUENF BUCHSTABEN):":PRINT,,"[157]-----":PRINT,,"[145][145][157][153]";:FORX=0TO4:GOSUB48:NEXT:PRINT:FORK=0TO4:I$=I$+A$(K):NEXT:IFI$=U$THENGOTO52
40 PRINT"DIE "Z$"-MASCHINE TRITT IN AKTION...":FORX=0TO4:READQ:Z=ASC(A$(X)):Z=Z-64:P=P+1:IFQ=ZTHENGOSUB47:NEXT
41 IFQ<ZTHENU=-1
42 IFQ>ZTHENU=1
43 IFQ=ZANDP=1767THEN45
44 IFP<1768THENFORY=ZTOQSTEPU:POKEP,Y:GOSUB47:NEXT:NEXT
45 PRINT"JUCHHU! EXPERIMENT GEGLUECKT!":GOSUB51
46 PRINT"[147]":POKE53280,14:PRINT"	[154] (W) BY [155]BREIT NIGHT[154] IN 1999 FOR B-SOFT!":NEW
47 FORS=1TO50:NEXT:RETURN
48 GOSUB53:Z=ASC(A$):IFZ<65ORZ>90THENX=X-1:RETURN
49 PRINTA$;:A$(X)=A$:RETURN:DATA5,23,12,2,12
50 PRINT"NUN WIRD ES ABER ZEIT FUER DICH, DIE SA-":PRINT"GENHAFTE[153]":PRINT,"[213][201][213] [213][213] [176][201][213]":PRINT,"[171] [194][194][194][194] [171][179][194]  - MASCHINE":PRINT,"[202][203][202][177][203][202][203][173][203][202][203]":PRINT"KENNENZULERNEN, WELCHE DIE UNGLAUBLICHE":PRINT"EIGENSCHAFT BESITZT, JEDES BELIEBIGE":PRINT"WORT IN "Z$" ZU VERWANDELN.":GOSUB51:RETURN
51 FORS=1TO2000:NEXT:RETURN
52 GOSUB51:PRINT"NA TOLL.. WIE EINFALLSREICH!":GOSUB51:GOTO32
53 GETA$:IFA$=""THEN53
54 RETURN